home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ham Radio 2000
/
Ham Radio 2000.iso
/
ham2000
/
misc
/
nshadow
/
cpd-d.bas
< prev
next >
Wrap
BASIC Source File
|
1994-06-23
|
436b
|
16 lines
10 PRINT " ***COMPOUND INTEREST***
15 PRINT
20 PRINT "WHAT IS THE VALUE OF THE PRINCIPLE (P)?"
30 INPUT "ENTER"; P
40 PRINT "WHAT IS THE PERCENTAGE RATE OF INTEREST (R)?"
50 INPUT "ENTER"; R
60 INPUT "ENTER NUMBER OF DAYS TO CALCULATE "; D
70 N = D/365
80 Q = 365
100 B=N*Q
110 A=P*((1+.01*R/Q)^B)
120 PRINT
130 PRINT " ***ANSWER***"
140 PRINT
150 PRINT A,"ACCUMULATED AMOUNT OF SAVINGS."